Het volgende voorbeeld maakt gebruik van de eigenschappen CodePane en TopLine om het nummer van de bovenste regel in de codemodule van het geselecteerde object VBComponent weer te geven.
Debug.Print Application.VBE.SelectedVBComponent.CodeModule.CodePane.TopLine